home *** CD-ROM | disk | FTP | other *** search
/ Business Assistant / Business Assistant.iso / acctg / db3ledge / labels.prg < prev    next >
Text File  |  1986-01-12  |  411b  |  18 lines
  1. *************************************** (LABELS.PRG)--JAY KENNEY
  2. CLEAR
  3. @ 3,18 SAY '        For darker print,'
  4. @ 4,18 SAY 'set up printer first.'
  5. @ 10,24 SAY 'Do you want to print ?'
  6. ?
  7. STORE ' ' TO OPTION
  8. WAIT '                                   ? ' TO OPTION
  9. IF OPTION<>'Y'
  10. RETURN
  11. ENDIF
  12. @ 18,15 SAY 'Press ESC to abort while printing...'
  13. USE VEND
  14. LABEL FORM LABELS TO PRINT
  15. EJECT
  16. EJECT
  17. RETURN
  18.